home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d16 / wincomm5.arc / SESSEDIT.WMS < prev    next >
Text File  |  1990-10-25  |  7KB  |  205 lines
  1. ;Session Editor tour
  2.  
  3.  
  4. STOP
  5. alt = 1         ;Sets up constants (ctrl key codes) for use by the
  6. tab = 9         ;SENDSPECKEY statement.
  7. down = 40
  8.  
  9.  
  10. SHOW(1)         ;Maximizes the WinComm Window
  11.  
  12. len = 1
  13.  
  14.    DIALOGBOX 63, 20, 243, 87, 21, "Session Editor Guided Tour"
  15.       LTEXT 9, 6, 230, 24, "This Macro will take you on a guided tour of the Session Editor.  The Session Editor is used to create and edit Session Files that WinComm uses for operation.  The tour will run automatically - or -"
  16.       LTEXT 9, 30, 230, 17, "you can speed things up by pressing Enter or clicking on the [OK] button on each tour dialog box."
  17.       DEFCANCELBUTTON 96, 61, 50, 15, "&OK"
  18.    DEND
  19. dtime = 15
  20. GOSUB delay
  21.  
  22.  
  23.    DIALOGBOX 68, 20, 238, 89, 21,  "Session Editor Demonstration"
  24.       LTEXT 7, 6, 230, 25, "The Macro will now open the Session Editor using the File|Edit Session menu item.  Since WinComm is actually running any keyboard or mouse entries other than selecting the[OK] buttons"
  25.       LTEXT 7, 30, 230, 21, "on the tour dialog boxes will throw the tour 'out of sync' so please refrain from doing so."
  26.       DEFCANCELBUTTON 93, 63, 50, 15, "&OK"
  27.    DEND
  28. dtime = 15
  29. GOSUB delay
  30.  
  31.   SENDSPECKEY(alt,0,asc("F"))
  32.   SENDSPECKEY(0,0,asc("E"))
  33.   SENDSPECKEY(alt,0,asc("E"))
  34.  
  35.    DIALOGBOX 108, 3, 145, 98, 16
  36.       CTEXT 7, 9, 7, 9, "<"
  37.       CTEXT 7, 21, 7, 9, "<"
  38.       LTEXT 20, 5, 121, 26, "The Type: option group shows or allows selection of a Session File type."
  39.       DEFPUSHBUTTON 48, 77, 48, 14, "&OK"
  40.       LTEXT 21, 42, 108, 33, "The Files: list box shows the Session file loaded in the Editor or allows selection of a Session File to edit."
  41.    DEND
  42. dtime = 15
  43. GOSUB delay
  44.  
  45.    DIALOGBOX 108, 45, 145, 65, 16
  46.       CTEXT 7, 9, 7, 9, "<"
  47.       CTEXT 7, 21, 7, 9, "<"
  48.       LTEXT 20, 5, 121, 33, "The Session Notes section allows you to enter approximately 40 characters to describe the Session File."
  49.       DEFPUSHBUTTON 47, 44, 48, 14, "&OK"
  50.    DEND
  51. dtime = 15
  52. GOSUB delay
  53.  
  54.    DIALOGBOX 108, 84, 145, 65, 16
  55.       CTEXT 7, 9, 7, 9, "<"
  56.       CTEXT 7, 21, 7, 9, "<"
  57.       LTEXT 20, 5, 121, 33, "The pushbutton group allows you to save and rename Session Files and exit the Session Editor."
  58.       DEFPUSHBUTTON 47, 44, 48, 14, "&OK"
  59.    DEND
  60. dtime = 15
  61. GOSUB delay
  62.  
  63.    DIALOGBOX 108, 125, 145, 98, 16
  64.       CTEXT 7, 13, 7, 9, "<"
  65.       CTEXT 7, 45, 7, 9, "<"
  66.       CTEXT 7, 78, 7, 9, "<"
  67.       LTEXT 20, 5, 121, 33, "The Session Options radio button group is used to change the view in the option edit window."
  68.       DEFPUSHBUTTON 46, 75, 48, 14, "&OK"
  69.       LTEXT 20, 38, 108, 34, "When one of these buttons is pressed the view changes showing controls to modify all Session File variables"
  70.    DEND
  71. dtime = 15
  72. GOSUB delay
  73.  
  74.  
  75.    DIALOGBOX 102, 88, 238, 78, 16
  76.       CTEXT 5, 4, 220, 8, "Session Editor-Quick Setup  See below"
  77.       LTEXT 6, 14, 228, 25, "This area in the Session Editor allows the operator to set the comm port, connection type, baud rate, protocol, and modem type."
  78.       LTEXT 6, 38, 228, 18, "These are generally the only settings that WinComm needs to operate."
  79.       DEFPUSHBUTTON 95, 55, 50, 15, "&OK"
  80.    DEND
  81. dtime = 15
  82. GOSUB delay
  83.  
  84.    DIALOGBOX 102, 167, 229, 55, 16
  85.       CTEXT 43, 4, 144, 8, "Terminal Session Parameters"
  86.       LTEXT 5, 12, 219, 27, "This is the default option edit Window for a Terminal Session.  By entering the data here and in the Quick Setup area WinComm can usually go on line immediately."
  87.       DEFPUSHBUTTON 89, 36, 50, 15, "&OK"
  88.       CTEXT 29, 5, 6, 7, "^"
  89.       CTEXT 192, 5, 6, 7, "^"
  90.    DEND
  91. dtime = 15
  92. GOSUB delay
  93.  
  94. SENDSPECKEY(0,0,down)
  95.  
  96.    DIALOGBOX 102, 167, 229, 55, 16
  97.       CTEXT 43, 4, 144, 8,"Communications Settings"
  98.       LTEXT 5, 12, 219, 27,"The Communication Settings option edit window will give you additional control of your computers comm port settings."
  99.       DEFPUSHBUTTON 89, 36, 50, 15, "&OK"
  100.       CTEXT 29, 5, 6, 7, "^"
  101.       CTEXT 192, 5, 6, 7, "^"
  102. dend
  103. dtime = 25
  104. GOSUB delay
  105.  
  106. SENDSPECKEY(0,0,down)
  107.  
  108.    DIALOGBOX 102, 167, 229, 55, 16
  109.       CTEXT 76, 4, 87, 8, "Modem Settings"
  110.       LTEXT 5, 12, 228, 25, "This option window provides WinComm with the information it needs to communicate with your modem.  The entries here come from the modem you selected in Quick Setup."
  111.       DEFPUSHBUTTON 94, 36, 50, 15, "&OK"
  112.       CTEXT 29, 5, 6, 7, "^"
  113.       CTEXT 192, 5, 6, 7, "^"
  114.    DEND
  115. dtime = 25
  116. GOSUB delay
  117.  
  118. SENDSPECKEY(0,0,down)
  119.  
  120.    DIALOGBOX 102, 167, 229, 55, 16
  121.       CTEXT 43, 4, 144, 8, "Terminal Setup"
  122.       LTEXT 5, 12, 219, 23, "The Terminal Setup allows you to change the way some incoming characters are handled that modify the operation of the selected terminal emulation."
  123.       DEFPUSHBUTTON 90, 36, 50, 15, "&OK"
  124.       CTEXT 29, 5, 6, 7, "^"
  125.       CTEXT 192, 5, 6, 7, "^"
  126.    DEND
  127. dtime = 25
  128. GOSUB delay
  129.  
  130. SENDSPECKEY(0,0,down)
  131.  
  132.    DIALOGBOX 102, 167, 229, 55, 16
  133.       CTEXT 43, 4, 144, 8,"Capture File Settings"
  134.       LTEXT 5, 12, 219, 27,"This view of the option edit display allows you to establish how you want to want to save characters in the Capture File."
  135.       DEFPUSHBUTTON 89, 36, 50, 15, "&OK"
  136.       CTEXT 29, 5, 6, 7, "^"
  137.       CTEXT 192, 5, 6, 7, "^"
  138.    DEND
  139. dtime = 25
  140. GOSUB delay
  141.  
  142. SENDSPECKEY(0,0,down)
  143.  
  144.    DIALOGBOX 102, 167, 229, 55, 16
  145.       CTEXT 43, 4, 144, 8,"ASCII Send Settings"
  146.       LTEXT 5, 12, 219, 27,"This view on the option edit display allows you to adjust the way WinComm sends ASCII text using the File|Send ASCII menu option.  "
  147.       DEFPUSHBUTTON 89, 36, 50, 15, "&OK"
  148.       CTEXT 29, 5, 6, 7, "^"
  149.       CTEXT 192, 5, 6, 7, "^"
  150.    DEND
  151. dtime = 25
  152. GOSUB delay
  153.  
  154. SENDSPECKEY(0,0,down)
  155.  
  156.    DIALOGBOX 102, 167, 229, 55, 16
  157.       CTEXT 43, 4, 144, 8,"Function Keys"
  158.       LTEXT 5, 12, 219, 27,"This view of the option edit display allows you to assign text to be transmitted or a Macro to run when a function key is pressed."
  159.       DEFPUSHBUTTON 89, 36, 50, 15, "&OK"
  160.       CTEXT 29, 5, 6, 7, "^"
  161.       CTEXT 192, 5, 6, 7, "^"
  162.    DEND
  163. dtime = 25
  164. GOSUB delay
  165.  
  166. SENDSPECKEY(0,0,down)
  167.  
  168.    DIALOGBOX 102, 167, 229, 55, 16
  169.       CTEXT 43, 4, 144, 8,"Display Settings"
  170.       LTEXT 5, 12, 219, 27,"This view of the option edit display allows setting of the way the WinComm display will appear and other operational parameters."
  171.       DEFPUSHBUTTON 89, 36, 50, 15, "&OK"
  172.       CTEXT 29, 5, 6, 7, "^"
  173.       CTEXT 192, 5, 6, 7, "^"
  174.    DEND
  175.  
  176. dtime = 25
  177.  
  178. GOSUB delay
  179.  
  180.    DIALOGBOX 57, 54, 234, 70, 17
  181.       CTEXT 27, 5, 186, 8, "WinComm Session Editor"
  182.       LTEXT 5, 13, 224, 33, "This ends the Session Editor Tour.  Don't let the many options that are available in the Session Editor bother you.  Chances are you will not need to use 95% of them- - - -just be thankful they are if you do!"
  183.       DEFPUSHBUTTON 95, 47, 50, 15, "&OK"
  184.    DEND
  185. dtime = 5
  186. GOSUB delay
  187.  
  188. GOTO leave  
  189.  
  190. delay:
  191. i = TIME?+dtime
  192. do
  193. j = DIALOG?
  194. if(PROMPT? == 2) GOTO leave
  195. UNTIL((TIME?>i) || (j != 255))
  196.    IF(j == 255) DESTROYDLG
  197. RETURN
  198.  
  199. leave:
  200. SENDSPECKEY(alt,0,asc("X"))
  201. SENDSPECKEY(0,0,asc("Y"))
  202. END
  203.  
  204.  
  205.